home *** CD-ROM | disk | FTP | other *** search
/ IRIX 6.2 Development Libraries / SGI IRIX 6.2 Development Libraries.iso / dist / complib.idb / usr / share / catman / p_man / cat3 / complib / sladiv.z / sladiv
Text File  |  1996-03-14  |  1KB  |  67 lines
  1.  
  2.  
  3.  
  4. SSSSLLLLAAAADDDDIIIIVVVV((((3333FFFF))))                                                          SSSSLLLLAAAADDDDIIIIVVVV((((3333FFFF))))
  5.  
  6.  
  7.  
  8. NNNNAAAAMMMMEEEE
  9.      SLADIV - perform complex division in real arithmetic   a + i*b  p + i*q =
  10.      ---------  c + i*d  The algorithm is due to Robert L
  11.  
  12. SSSSYYYYNNNNOOOOPPPPSSSSIIIISSSS
  13.      SUBROUTINE SLADIV( A, B, C, D, P, Q )
  14.  
  15.          REAL           A, B, C, D, P, Q
  16.  
  17. PPPPUUUURRRRPPPPOOOOSSSSEEEE
  18.      SLADIV performs complex division in  real arithmetic in D. Knuth, The art
  19.      of Computer Programming, Vol.2, p.195
  20.  
  21.  
  22. AAAARRRRGGGGUUUUMMMMEEEENNNNTTTTSSSS
  23.      A       (input) REAL
  24.              B       (input) REAL C       (input) REAL D       (input) REAL
  25.              The scalars a, b, c, and d in the above expression.
  26.  
  27.      P       (output) REAL
  28.              Q       (output) REAL The scalars p and q in the above
  29.              expression.
  30.  
  31.  
  32.  
  33.  
  34.  
  35.  
  36.  
  37.  
  38.  
  39.  
  40.  
  41.  
  42.  
  43.  
  44.  
  45.  
  46.  
  47.  
  48.  
  49.  
  50.  
  51.  
  52.  
  53.  
  54.  
  55.  
  56.  
  57.  
  58.  
  59.  
  60.  
  61.  
  62.  
  63.                                                                         PPPPaaaaggggeeee 1111
  64.  
  65.  
  66.  
  67.